home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1998 January / PC Answers Issue 49 Cover CD January 1998.iso / Apps / Director / DATA.Z / Keyboard Lingo.dir / Scripts_12_Key Down Script for Scene 2.ls < prev    next >
Encoding:
Text File  |  1997-05-10  |  387 b   |  17 lines
  1. on exitFrame
  2.   go(the frame)
  3. end
  4.  
  5. on keyDown
  6.   put the key into field "The Key" of castLib "Text"
  7.   puppetSprite(8, 1)
  8.   set the member of sprite 8 to member "downstate" of castLib "internal"
  9.   put " " into field "Key Data" of castLib "Text"
  10.   put " " into field "keyCode Data" of castLib "Text"
  11.   put " " into field "ASCII Data" of castLib "Text"
  12. end
  13.  
  14. on keyUp
  15.   puppetSprite(8, 0)
  16. end
  17.